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ون ف الخ إتبع معنا الخطوات 
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الخاصية تلعب دور كبير والمتمثل في تشغيل البحث أو إلغائه وهي تأخذ قيمتين مءءاه۴ في حالة عدم‎ 


ال 8 و القيمة true‏ في الد E‏ عا خاصبة البحث و القيمة التلقائبة لھا تکون false‏ 
:Filterı‏ 
هذه الخاصية هي التي ستقوم بالبحٿ كما نريد 


مثال_ إذا أردنا أن نقوم بالبحث عن الزابون على أساس الإسم ولنفرضه زاج ,نقوم بكتابة 


الجملة التالية في الخاصية ١٠]اأ۴‏ دون أي خطأ 


٠‏ عءاf‏ إلىعru)‏ لكي تعمل الخاصية 
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المشكل المطروح الأن هو كيف 
ما عليك إلا أن تتبع الخطوات التالية: 


نقوم بإضافة ألم من۲ ةل" هء كما في ١‏ 
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نقوم بمسح الكتابة الموجدة داخل اهم من الخابضية † 


نقر مزدوج على ألم ونكتب الأسطر التالية 


Proced' | ange (Sender: TObject); 


Var x: strî 
Begin 
If Edit1. Text='" then 
DataModule2.Table1.Filtered:=false 


Else 
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أرجو ان أكون قد أوصلت الفكرة إليكم و أنكم إستفدتم من هذا الدرس 


إلى اللقاء في درس جديد إن شاء الله 
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